function writecompfile(G,filename)

for i=1:length(G)
    %TO DO
    S(i)='0'+G(i);%Here we should convert a codeword numeric reference to an actual codeword
end

%writefile